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PRESIDENT'S LETTER 



My term as president of LICA is just about up and this is the last 

"p ^sident's Letter" I'll have to write. I've enjoyed working for the club 

iu ^ng the past year and I hope to continue to do so by serving on the 

executive board and as one of the sysops for LIMBS. I hope everyone has 
enjoyed the meetings and speakers we had as much as I did. 

We had, or are going to have, a few firsts this year. For those of you who 
were not at November's meeting, the membership voted on and approved the first 
lues increase in the clubs history. The increase (to $12) was necessitated by 
rising costs in postage and the advent of incorporation. The work on 
incorporation is moving along nicely, and Harry Phillips should have more to 
tell us about it at subsequent meetings. We also are considering holding a 
computer flea market sometime in the future. While this plan is still in the 
iiscussion stage, if we can get a few other clubs in the area interested in 
such an event, there is a distinct possibility that a flea market can take 
pi ace . 

dominations were held for LICA officers at the last meeting. The only nominees 
»rere those proposed by the executive board, so it is almost a foregone 
conclusion that the 1982 officers will be: 



President 
Vice President 
Secretary 
Treasurer 



Al Stone 
Bob Kowitt 
Jackie Tulumello 
Aileen Harrison 



Al will be civing up his position as STACK editor and the cluh newsletter will 
be taken ovfr by Al Levy (after all, we don't want to give Mr. Stone too much 
power* Se will also elect meters to the executive board in December, tut I 
won't take the time to list the nominees now. 

nnr s-oeaker on December 18 will be Mike LaManna from FORTH, Inc. He will ^ 
leaking n of all thing, the FORTH language. I've recently started using 
loMH and have found it to be a very powerful programming tool eyen though it 
is quite different from the more common high level languages with which most 
of us are familiar. 

T'rr sure I'll see most of the members at the December meeting, but for those 
of you Ino won't oe able to make it, I'll take this opportunity to wish you a 
joyous holiday season and a happy new year. 

TMZ A been D nom?n;ik to be President of this Association for thecjiejj.r 
vear 1982. This is something that I have thought about very much for a vj 
lone time Thirteen years ago I was a successful sales rep. for RCA Computers 
Successful that is, until a decision came down from above to abandon the 
compu er busine s. That decision left me with two regrets: that I ha not 
fSIly mastered the hardware and software technology from which I had 
not Insubstantial living, and that I had allowed others to contro Jf^^ 1 
dpcitinv The second regret has been erased in that I have been sen empioyeu 
most of the pas? Secadf. The other has be-n happily met through my immersion 
in the flow of microprocessing technology. Ever since I built my IMSAI I haye 
read and experimented and used and played with and Just generally reveled in 
the incredihle world of small computers and computing. 

t t r a w*^ a vear old when I first joined. It was not that I was unaware .* 
h • litlteltl of y ms°o^niza»o„ - A si.ply not . Joiner The friendships 
that T hflvp made here are among the most cherished in my lite, lor tne past 
three veils I have edited The STACK, acted as a repository for programs, 
publications, aSd documentation, created and maintained the Master Mailing 
List System, and attended far fewer meetings than I would have liked. 

There are simply net enough days in each month, nor hours in each day that one 
person could Jos'sioly actas President and newsletter Editor has t : > said 

that The STACK is the cement which holds L.I .C . A t outlier. "iin my 
resignation the task or putting this thing together falls to A1 ^ e 7J' J 
brilfiant and creative man who has given much to this club and who has helped 
me with The STACK more than once in the recent past. I trust the tone and 
quality of The STACK as a timely, concise, informative, and professional-style 
periodical will be maintained. 

As President I hope to directly influence as many persons as possible in the 
excitement of the challenges and the satisfactions to be gleaned from their 
Involvement with this, the most fantastic hobby of all. I want to infect 
everyone with the awe and pleasure of the central technology of our time and 
Vo assTre old and new members alike that here is the one area of "Jlvitythat 
no one can ever fully master because its horizon continually moves further 
away from the observer. 

Share with me the exhilaration of racing toward the twentyfirst century,to the 
limits of information and communications technology, of learning of the r t 



astonishing developments in electronics almost as they emerge from 
the laboratories in which they are created, and of being surrounded by a truly 
fantastic group of kindred souls. Please vote for me as President, and 
continue to support the remarkable Long Island Computer Association. AL 

TRS-80 USERS' GROUP 

Please note that this sub-group meets twice monthly, at 7:00 p.m. on both the 
second and third Fridays of the month at NYIT. Don't forget that RADIO SHACK 
has marketed five different machines since entering the microcomputer market, 
and our membership utilize all of them. 

S-100 USERS' GROUP 

Monthly meetings are held on the second Friday at 8:00 p.m. at NYIT. 
Alternating with timely presentations fj on state-of-the-art hardware and 
software from both the "hardware hacker" and system user viewpoints are 
general discussion meetings. 

* *e four most active sub-groups can be contacted through their chairmen: 

S-100 Users' Group Auguste Schwab, Jr. (516) 374-4168 

TRS-80 Users' Group Bob Zito (516) 822-4031 

6502 Users' Group Steve Perry (516) 744-6462 

680x Users' Group Roger Kaucher (516) 796-8746 

Aileen wants us to remind everyone attending the general meeting on Dec. 18th 
that TWO door prize raffle tickets will be given to each person. This has been 
an annual custom since the inception of LICA. 

SOFTWARE WANTED 

ta Mania, Inc., 51625 Chestnut Road, Granger, IN 46532 is seeking BASIC 
software to publish. Length should not exceed 13K, nor require graphics or 
functions peculiar to any particular system. Contact Joe Torzewski or Glen 
Mummey to obtain a "submittal agreement" prior to sending materials. 

SAM76 TECHNICAL NOTE ISSUED 

We have received a document called "SAM76 Technical Note 9 - August 1981 
which describes several significant changes and additional features to this 
so-called "public domain" programming language. An APPLE version has been pro- 
duced which contains 70 erotic limericks (!!). As this machine is owned by 
very few LICA members, I fear that most of us will not be privy to those five 
line feems. Contact Mr. Kagan at (609) 466-1129 for further information. 

NEW FLOPPY DISK REPAIR SERVICE 

Mi bus Computers, Inc., R.D.#3/Box 577A/Prosser Ave . /Williams town, NJ 08094, 
which normally services computer dealers' disk drives, offers repair and 
alignment to LICA members at the same rates they charge dpalers. Contact 
Michael Metelski, Pres. at (609) 629-0568. Persci drives are also handled. 

TRS-80 SYSTEM REFERENCE CARD 

Nanos Systems Corp., P.O. Box 24344, Speedway, IN 46224 has sent along a 
sample of their combined BASIC and assembler card. It has 8 folds, 16 panels, 
and is printed on 80 pound stock. The retail price is $4.95, and that is 
quite a baragain for something that fully summarizes both the Level II BASIC 
and assembler manuals. 



MOTOROLA & INTEL EQUIPMENT AVAILABLE 

We are in receipt of a list of 8080/6800/6809 devices heing offered for sale 
fcy a Southern Cali fornia- fcased firm. The accompanying letter states that 
vacuum, laser, and audio devices, as well as large quantities of IC chips are 
also available. Contact The STACK for further information. 



CONTRIBUTED SOFTWARE 

The following program will help you find your way around Manhattan 

enjoy using it. When you need to locate a street address just 

program. 



I hope 
run 
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LOCATE MANHATTAN ADDRESS 
WRITTEN BY EDWARD L. GITTELSON 
VIRTUAL SYSTEM COMPUTER CONSULTANT 
135 CLINTON ST APT 1Y 
HEMPSTEAD, NEW YORK 11550 

NORTH STAR BASIC VERSION 6 
COPYRIGHT (c) 1979 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
DIM A$ (23 ),S $( 17 ), T$ (544 ),T1( 31)^2(31) 
PRINT 'MANHATTAN ADDRESS PROGRAM 

WRITTEN JAN 1979" 

COPYRIGHT (c) 1979 BY VIRTUAL SYSTEMS 

VERSION #1 - NORTH STAR 



PRINT 
PRINT 
PRINT 
PRINT 
REM AVE 



TABLE 



DATA 5TH AVE 

DATA "10TH AVE 

DATA "1ST AVE 

DATA "2ND AVE 

DATA "3RD AVE 

DATA "4TH AVE 

DATA "7TH AVE 

DATA "8TH AVE 

DATA "9TH AVE 

DATA "AMSTERDAM AVE 

DATA "AUDUBON AVE 

DATA "AVE A 

DATA "AVE B 

DATA "AVE C 

DATA "AVE D 

DATA "AVE OF AMERICAS 

DATA "BROADWAY 

DATA "CENTRAL PARK WEST 

DATA "COLUMBUS AVE 

DATA "CONVENT AVE 

DATA "EDGECOMBE AVE 

DATA "FT WASHINGTON AVE 

DATA "LENOX AVE 

DATA "LEXINGTON AVE 

DATA "MADISON AVE 

DATA "MANHATTAN AVE 

DATA "PARK AVE 

DATA "PLEASANT AVE 
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450 DATA RIVERSIDE DRIVE ",10,72 

460 DATA "ST NICHOLAS AVE ",20,110 

470 DATA "WADSWORTH AVE ",20,173 

480 DATA "WEST END AVE ",20,60 

90 REM ADDRESS LOCATOR 

000 FOR J=0 TO 31 

510 LET I1=17*J+1 

520 LET 12=11+16 

530 READ S$,T1(J),T2(J) 

540 LET T$(I1,I2)=S$+" 

550 NEXT 

560 PRINT "THIS PROGRAM WILL: " 

570 PRINT " FIND THE STREET" 

580 PRINT " GIVEN THE AVE ADDRESS" 

590 PRINT 

600 PRINT "ABBREVIATE AVENUE AS AVE" 

*S10 PRINT "ENTER ADDRESS: # AND AVE NAME" 
20 INPUT" :",A$ 

630 IF A$<>"" THEN 660 

640 PRINT "NO ADDRESS ENTERED" 

650 GOTO 560 

660 IF A$(l,l)<>" " THEN 690 

670 PRINT "1ST CHARACTER CAN'T BE SPACE" 

680 GOTO 560 

690 IF (ASC(A$)>44) AND (ASC(A$)<58) THEN 720 

700 PRINT "NUMBER MUST BE ENTERED FIRST" 

710 GOTO 560 

720 LET L=LEN(A$) 

^30 IF L>6 THEN 760 
40 PRINT "TOO SHORT TO BE VALID" 

750 GOTO 560 

760 FOR J=l TO L 

770 IF A$(J f J)="." THEN EXIT 800 

780 NEXT 
790 GOTO 820 

800 PRINT "DEC PT NOT ALLOWED"\GOTO 560 
810 IF L>9 THEN L=9 
820 FOR J=2 TO L 

830 IF A$(J,J)=" " THEN EXIT 800 
840 LET I2=ASC(A$(J,J)) 

850 IF (I2<48) OR (I2>57) THEN EXIT 870 
860 NEXT 

870 PRINT "SEPARATE NAME FROM NUMBER "\GOTO 560 
880 LET N0=VAL(A$(1,J-1)) 
890 IF NO>0 THE 910 
900 PRINT "INVALID NUMBER"\GOTO 560 
910 LET S$=A$(J+l)\L=LEN(S$)-2 
920 IF L<3 THEN 740 
930 LET S$=S$+" " 
940 FOR 11=1 TO L 

950 IF A$(Il f Il+3)=" ST " THEN EXIT 990 
960 IF A$(ll,Il+3)="STRE" THEN EXIT 990 
970 NEXT 

Q80 LET L=L+2\S$=S$(1,L)\G0T0 1030 
50 PRINT "PLEASE ENTER AN AVE" 



300 PRINT "PGM DOES NOT ACCEPT STREETS" 

010 GOTO 560 

320 REM SPECIAL CASES 

330 IF si<>"5TH AVE" THEN 1180 

340 LET J=0 

',50 IF (N0<775) OR (N0>1286) THEN 1070 

560 LET T1(0)=10\T2(0)=-18\GOTO 1300 

270 IF NO>2000 THEN 1300 

380 LET I2 = NO/200+l 

390 IF I2>6 THEN 12=12-2.5 

100 LET I2=INT(I2) 
10 ON 12 GOTO 1120,1130,1140,1150,1160,1170,1170 

120 T2(0)=13\GOTO 1300 

;30 T2(0)=16\GOTO 1300 

,40 T2(0)=18\GOTO 1300 

150 T2(0)=20\GOTO 1300 

160 T2(0)=45\GOTO 1300 

170 T2(0)=35\GOTO 1300 

180 LET J=32 

190 REM BINARY SEARCH 

200 LET J=J/2 

210 IF JOINT( J) THEN 1270 
.220 LET I1=17*J+1\\I2=I1+1-1 

230 LET A$=T$(I1,I2) 

240 IF S$=A$ THEN 1300 
,250 IF S$OA$ THEN J=3*J 
^260 GOTO 1200 

1270 PRINT "ADDRESS NOT FOUND 
1280 GOTO 560 
1290 REM CALCULATE STREET 
1300 LET N1=INT(N0/T1(J)+T2( J)) 
i310 IF (J=6) AND (Nl>110) THEN Nl=Nl+8 
1320 PRINT NO f S$ f "lS" 

,330 IF ((J=16) AND (Nl>22) OR (J<>16) THEN 1360 
1340 PRINT " BELOW 23RD STREET 

350 GOTO 1450 

360 IF ((J=28) AND (NK166)) 0R (< (J<>28) THEN 1390 

370 PRINT " ABOVE 165TH STREET 

380 GOTO 1450 

390 PRINT " BETWEEN 

400 GOSUB 1470 

410 PRINT " AND , 

420 LET N1=N1+1 

430 GOSUB 1470 

440 PRINT 

450 STOP 

460 REM SUBROUTINE 

470 LET NO=N1-10*INT(N1/10) 

480 IF N0<3 THEN 1540 

490 ON NO GOTO 1510,1520,1530 

500 PRINT "* ERROR *"\GOTO 1550 

!ri0 PRINT Nl ,"ST STREET" ,\GOTO 1550 

r 20 PRINT N1,"ND STREET", \GOTO 1550 

530 PRINT N1,"RD STREET" , \GOTO 1550 

-40 PRINT N1,"TH STREET", \GOTO 1550 



1550 RETURN 
1560 END 

ADM-3A DIRECT CURSOR ADDRESSING 

jot* Kowitt submitted the following gem for MBASIC tinkerers: 

10 DEF FNY$(X,Y)=CHR$(27)+"="+CHR$(X+32)+CHR$(Y+32) 

20 PRINT FN*$(12,5);WoRl)$:REM*** 'WQRD$' is any desired character sequence 

CLASSIFIED NOTICES 

SEUGART disk drive alignment and repair by Computor Corrector. Contact Steve 

Metal. (516) 499-1135 

For Sale - IBM Selectric w/t ract or/interf ace/Z-80 driver software/extra ball. 
Original cost $1200. Asking $600. Eob Kowitt (516) 483-5781 

Services - Accounting, record-keeping, & tax services provided weekly, month- 
ly, or quarterly — basis to suit. Sales tax, employer wage forms, bank 
records, cash receipts and disbursements journals, general ledgers, etc. Small 
business and personal accounts invited. Aile^n Harrison (516) 938-6769 

For Sale - ALKEN Selectric I/O writer with parallel interface, driver software 
and yellow formica de^p-well table. Al Stone. (516) 731-1649 

Repair Service - KIM, SYM, AIM-65 Single Board Computers. Contact Steve Perry 
y (516) 744-6462 

For Sale - Amateur RTTY Equipment. Model 28 KSR, Model 28 thre^-spe^d typing 
reperf., Model 14 T.D. Also, complete set of cables and controls; TTL/2 MAIN 
MNE Terminal Unit; and Main Line AFSK generator. Details: (516) 744-6462 

COMMERCIAL ADVERTISING POLICY 

In an effort to cover our costs of duplication and mailing, and to provide a 
more extensive monthly edition of The STACK, commercial display ads are 
accepted in 1/4, 1/2 and full-page sizes. Minimum participation is for thre & 
months, and the three month rates are $45, $65, and $100 respectively. Copy 
need not be the same each month. Camera-ready material must be accompanied by 
checks payable to LICA. 

The LONG ISLAND COMPUTER ASSOCIATION is open to anyone, amateur or profession- 
al, with an interest in computers, computer applications, programming, or 
related subjects. Dues are $10 per year, which includes monthly issues of this 
publication, The STACK. 

The STACK is also mailed to other computer clubs on an exchange basis, as well 
as to various technical publishers. Permission for reprinting or quoting items 
appearing in The STACK is granted providing that credit is given, and that a 
copy of the reprinted data or information is sent to The STACK. 

Members can vote in club elections, and place non-commercial classified ads 
without charge, and commercial ads at nominal cost. 

Member articles and other data affecting The STACK must be received no later 
than one we fc k prior to the last calendar day of the month prior to that of 
tmbli cation . 
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